﻿Public Class EmpleadoNegocio

    Public Function insertar(ByVal nombre As String, ByVal apellido As String, ByVal dni As String, ByVal direccion As String, ByVal telefono As Integer, ByVal sexo As String, ByVal fecha_nac As String) As Empleado

        Dim modelo As New Empleado()
        'modelo.idEmpleado = idEmpleado
        modelo.Nombre = nombre
        modelo.Apellido = apellido
        modelo.DNI = dni
        modelo.Direccion = direccion
        modelo.Telefono = telefono
        modelo.Sexo = sexo
        modelo.Fecha_nac = fecha_nac

        Dim dao As New EmpleadoDAO
        Return dao.insertar(modelo)
    End Function

  

    Public Function obtener(ByVal DNI As Integer) As Empleado
        Dim dao As New EmpleadoDAO
        Return dao.obtener(DNI)
    End Function

    Public Sub actualizar(ByVal dni As Integer, ByVal direccion As String, ByVal telefono As String, ByVal fecha_nac As String)

        Dim modelo As New Empleado()
        modelo.DNI = dni
        modelo.Direccion = direccion
        modelo.Telefono = telefono
        modelo.Fecha_nac = fecha_nac
        Dim dao As New EmpleadoDAO
        dao.actualizar(modelo)
    End Sub

End Class
